home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Developer CD Series 1990: Discy Business
/
Discy Business.2mg
/
DEV.CD
/
GUIDED.TOURS
/
IIC.PLUS.TOUR
/
APPLE.PLAY
/
SPACE.QUARKS
(
.txt
)
< prev
next >
Encoding:
Amiga
Atari
Commodore
DOS
FM Towns/JPY
Macintosh
Macintosh JP
Macintosh to JP
NeXTSTEP
RISC OS/Acorn
Shift JIS
UTF-8
Wrap
Applesoft BASIC Source Code
|
1984-10-29
|
424 b
|
11 lines
|
[FC] Applesoft BASIC Program (0x0801)
10 TEXT : HOME :CD$ = CHR$(4)
11 PRINT CD$;"PREFIX /TUTOR/APPLE.PLAY"
12 VTAB 10: HTAB 5: PRINT "This program must be exited by": HTAB 4: PRINT "pressing OPEN APPLE-CONTROL-RESET."
14 PRINT : PRINT : HTAB 3: PRINT "Please lock the CAPS LOCK key down,": HTAB 11: PRINT "then press RETURN."
16 POKE -16368,0
17 P = PEEK( -16384): IF P < >141 GOTO 17
19 HOME
20 PRINT CD$;"BLOAD /TUTOR/APPLE.PLAY/QUARK.LOGO,A$4000,D1"
25 HGR : POKE -16302,1
27 PRINT CD$;"BLOAD /TUTOR/APPLE.PLAY/UP": CALL 4096
40 PRINT : PRINT CD$;"RUN /TUTOR/APPLE.PLAY/SP.QRUN"